BEGIN{
    RS=">"
    FS="\n"
}
{
    arg = ARGV[0]
    i = 2
    while(i < NF){
        if(arg ~ /^$1/){
            seq = $i "\n"
        }
        i++
    }
    print arg
    #print ">"$1 "\n" seq
    seq = "" 
}
